[求助] 帮小弟看看 Pascal 作业啊...不会做 T_T

来源:百度知道 编辑:UC知道 时间:2024/09/24 13:36:28
上个星期老师留了张卷子,叫下个星期交,作为这个学期的平时成绩,明天就要交了,可是老多都不会做555555
大伙帮帮忙!!1
==================================================
1、X既不在-3到-2的范围内又不在2到3的范围内的pascal表达式为_________

2、设有以下程序段:
BEGIN
a:=0;
FOR i:=7 DOWNTO 2 DO
Case i of
1, 2: a:=a+1;
3, 4: a:=a+2;
5, 6: ;
7, 8: a:=a+3
END;
Writeln(‘a’, a:1);
END.
若变量已说明, 则程序运行后的输出是
A) a=8 B) 0 C) a=6 D) 12

3、已知函数说明如下:
FUNCTION f(n:integer ) :integer ;
BEGIN
IF n=0 THEN f :=0 ;
ELSE IF n>0 THEN f :=f(n-2)
ELSE f :=f(n+3) ;
END;
则函数调用f(5)的是:
A) 0 B) 1 C) -1 D) -2

4、若运行时输入以下指定资料,则程序的运行结果为_____________。
PROGRAM OVER(Input, output);
VAR

1.(x<-2) and (x>-3) and (x<2) and (x>-3)
2.程序是这样的:(选A)
var
a,i : longint;
begin
a:=0;
for i:=7 downto 2 do
case i of
1, 2: a:=a+1;
3, 4: a:=a+2;
5, 6: ;
7, 8: a:=a+3
end;
writeln('a', a:1);
readln;
end.
3.B
4.This Is A Example.
5.2 1 0 1 2

1.not((x>-3) and (x<-2)) and not((x>2) and (x<3))
2.A
3.A

1、(x<-2) and (x>-3) and (x<2) and (x>3)
2、A
3、B
4、This
5、2 1 0 1 2

既然是作业就应该自己做呀!

简单啊
自己做